home *** CD-ROM | disk | FTP | other *** search
/ Ham Radio 2000 #2 / Ham Radio 2000 - Volume 2.iso / HAMV2 / ANTENNA / YAGIU112 / WRITE_IP.C < prev    next >
C/C++ Source or Header  |  1995-08-19  |  1KB  |  30 lines
  1. #include <stdio.h>
  2. #include "yagi.h"
  3.  
  4. void write_input_data_to_disk(FILE *fp, char *notes, double frequency, double min_f,double max_f, double step_f, int elements,int driven,int parasitic, double angular_step, double **d, double **p, double scale_factor) 
  5. {
  6.     int i; 
  7.     fprintf(fp, "NOTES %s\n", notes);
  8.     fprintf(fp, "FREQUENCY %lf\n", frequency);
  9.     fprintf(fp, "MIN_FREQUENCY %lf\n", min_f);
  10.     fprintf(fp, "MAX_FREQUENCY %lf\n", max_f);
  11.     fprintf(fp, "STEP_FREQUENCY %lf\n", step_f);
  12.     fprintf(fp, "ELEMENTS %d\n", elements);
  13.     fprintf(fp, "DRIVEN %d\n", driven);
  14.     fprintf(fp, "PARASITIC %d\n", elements-driven);
  15.     fprintf(fp, "ANGULAR_STEP   %lf\n", angular_step);
  16.     fprintf(fp, "#DATA_DRIVEN        x         y       length     diameter voltage(r) voltage(i)\n");
  17.     fprintf(fp, "DATA_DRIVEN ");
  18.     for(i=1; i<=driven; ++i)
  19.         fprintf(fp," %10.5lf %10.5lf %10.5lf %10.5lf %10.5lf %10.5lf", d[i][1]/scale_factor, d[i][2]/scale_factor, d[i][3]/scale_factor, d[i][4]/scale_factor, d[i][5], d[i][6]);
  20.     fprintf(fp, "\n#DATA_PARASITIC     x         y       length     diameter\n");
  21.     fprintf(fp, "DATA_PARASITIC\n");
  22.     for(i=1; i<=elements-driven; ++i)
  23.     {
  24.     if(i==1)
  25.         fprintf(fp,"             %10.5lf %10.5lf %10.5lf %10.5lf reflector\n", p[i][X]/scale_factor, p[i][Y]/scale_factor, p[i][LENGTH]/scale_factor, p[i][4]/scale_factor);
  26.     else
  27.         fprintf(fp,"             %10.5lf %10.5lf %10.5lf %10.5lf D%d\n", p[i][X]/scale_factor, p[i][Y]/scale_factor, p[i][LENGTH]/scale_factor, p[i][4]/scale_factor,i-1);
  28.     }
  29. }
  30.